* process.c (status_message): Use SSET.

diff --git a/src/process.c b/src/process.c
index 3554aa2f9cb19716e52517ed7bf7e70d8cf04b5e..c4d95c6074f64d82ef02e1aa11a4c7b1ed6e0992 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -419,7 +419,7 @@ status_message (status)
        signame = "unknown";
       string = build_string (signame);
       string2 = build_string (coredump ? " (core dumped)\n" : "\n");
-      SREF (string, 0) = DOWNCASE (SREF (string, 0));
+      SSET (string, 0, DOWNCASE (SREF (string, 0)));
       return concat2 (string, string2);
     }
   else if (EQ (symbol, Qexit))